Mathematica and R code